(cmd_error_internal): Use const for pointer to lisp

string data.

diff --git a/src/keyboard.c b/src/keyboard.c
index 14f21cbe12bf52ff59e69125e0a1c4cc4df78032..db4ebd1635fdc98c89ae3ad329dab00ec4d4be03 100644 (file)
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -1209,7 +1209,7 @@ cmd_error_internal (data, context)
         *Messages*.  */
       if (!NILP (Vsignaling_function) && SYMBOLP (Vsignaling_function))
        {
-         char *name = SDATA (SYMBOL_NAME (Vsignaling_function));
+         const char *name = SDATA (SYMBOL_NAME (Vsignaling_function));
          message_dolog (name, strlen (name), 0, 0);
          message_dolog (": ", 2, 0, 0);
          Vsignaling_function = Qnil;